home *** CD-ROM | disk | FTP | other *** search
/ Professional Soft Collection 1.02 / Professional Soft Collection 1.02.iso / nu80 / cpage850.ps! / CPAGE850.PS
Text File  |  1994-04-23  |  2KB  |  46 lines
  1. /reencodedict 16 dict def
  2. /ReEncodeFont {
  3. reencodedict begin /newcodes exch def /newfontname exch def /basefontname exch def
  4. /basefontdict basefontname findfont def
  5. /newfont basefontdict maxlength dict def
  6. basefontdict { exch dup /FID ne { dup /Encoding eq { exch dup length array copy newfont 3 1 roll put }
  7. { exch newfont 3 1 roll put } ifelse } { pop pop } ifelse } forall
  8. newfont /FontName newfontname put
  9. 128 1 255 { newfont /Encoding get exch /.notdef put } for
  10. newcodes aload pop newcodes length 2 idiv { newfont /Encoding get 3 1 roll put } repeat
  11. newfontname newfont definefont pop
  12. end
  13. } def
  14.  
  15. /CodePage850 [ 7/bullet 16/grave 17/acute 18/circumflex 19/tilde 20/macron
  16. 21/breve 22/dotaccent 23/dieresis 24/ring 25/cedilla 26/hungarumlat
  17. 27/ogonek 28/caron
  18.  
  19. 128/Ccedilla 129/udieresis 130/eacute 131/acircumflex 132/adieresis
  20. 133/agrave 134/aring 135/ccedilla 136/ecircumflex 137/edieresis 138/egrave
  21. 139/i 140/i 141/i 142/Adieresis 143/Aring
  22.  
  23. 144/Eacute 145/ae 146/AE 147/ocircumflex 148/odieresis 149/ograve
  24. 150/ucircumflex 151/ugrave 152/ydieresis 153/Odieresis 154/Udieresis
  25. 155/oslash 156/sterling 157/Oslash 159/florin
  26.  
  27. 160/aacute 161/i 162/oacute 163/uacute 164/ntilde 165/Ntilde 166/ordfeminine
  28. 167/ordmasculine 168/questiondown 169/registered 170/logicalnot 173/exclamdown
  29. 174/guillemotleft 175/guillemotright
  30.  
  31. 179/bar 180/plus 181/Aacute 182/Acircumflex 183/Agrave 184/copyright
  32. 185/plus 186/bar 187/plus 188/plus 189/cent 190/yen 191/plus
  33.  
  34. 192/plus 193/plus 194/plus 195/plus 196/hyphen 197/plus 198/atilde
  35. 199/Atilde 200/plus 201/plus 202/plus 203/plus 204/plus 205/hyphen
  36. 206/plus 207/currency
  37.  
  38. 210/Ecircumflex 211/Edieresis 212/Egrave 214/Iacute 215/Icircumflex
  39. 216/Idieresis 217/plus 218/plus 221/bar 222/Igrave
  40.  
  41. 224/Oacute 225/germandbls 226/Ocircumflex 227/Ograve 228/otilde 229/Otilde
  42. 233/Uacute 234/Ucircumflex 235/Ugrave 238/macron 239/acute
  43.  
  44. 244/paragraph 245/section 247/cedilla 248/ring 249/dieresis 250/periodcentered
  45. ] def
  46.